APPENDIX I 



ttttrttfttttftttrrtrrrrrtrtttrttttrttttrrftfrtrttttrrftrtrtrttrtrrirrft 
t 

TRANSMITTER CODE 
COPYRIGHT © POINT SIX WIRELESS, LLC 2002 

rffftrfirr/rrr/f/rrrrfffr/rrffrrr^ 

base $10 

INCLUDE 'inOSJlA.asm' ; equates for the HC705J1A 

; This version is the COUNTER IR interface 

; The clock taps the main processor 16/second. 

; This version has microprocessor power level selection via pullups. 



org MOR 

fcb $A0 ; SHORT OSC DELAY 



ttftfitjttttttfffttftfttt/ttttttttttttttttttttttftttttttttttttttttttttf 



Equates and RAM Storage 



f r r r r t / t r r r t f r f / f r r r f r r r t r r r r r r f r r r r r t r t t r r r f r r r r r r r r t r f r t r r r t r r t r , r r r r 



I/O Pin Equates: 



rrttrtrtrrtr 


r i r r r r 


f r r / r f r 


rrrrrrrrtttrrrrrrt 


t t t r r r 


r r r r r r r r r r r r / t r r r i t 


PWRLEVL 


equ 


0 


r 


PAO, 


POWER LEVEL LOW 


CONTROL 












PWRLEVM 


equ 


1 


f 


PAO, 


POWER LEVEL MEDIA 


CONTROL 












PWRLEVH 


equ 


2 


/ 


PAO, 


POWER LEVEL HIGH 


CONTROL 












IRDOUT 


equ 


3 


t 


PA3, 


ir data, output 


LED 


equ 


5 


r 


PA5, 


LED, OUTPUT 


RBASE 


equ 


7 


r 


PA7 , 


RESET BASE TIMMING, 


OUTPUT 












PUHBUT 


EQU 


2 


f 


pb2, 


PUSH BUTTON INPUT 


org 


RAM 










QUIETMO 


RMB 


1 


r 


QUIET 


1 MODE FLAG 


PBCTR 


RMB 


1 


i 


PUSH 


BUTTON DOWN TIMER 


HI POWER 


RMB 


1 


/ 


HIGH 


POWER MODE FLAG 
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PSTIMER 



RMB 



; POWER SELECT TIMER 



org EPROM 



; start at the top of EPROM 



t t t r > t f r i t f t t f f t r t r r t / r t r t t i i r / / r t r r t t > t r r t r t r t t * t t / f t r t r t t i t i i / / / r f t f r 



POWER 
state 



POWERO 
POWER1 

POWER2 

POWER3 
POWER4 

POWER5 



RSP 
Ida 

sta 
Ida 

sta 
Ida 
sta 
TST 
BNE 

TST 
BNE 
BSET 
BSET 

Ida 

bclr 

bset 

deca 

bne 

bclr 

Ida 
deca 
bne 
bset 



TST 

BEQ 

BSET 

BSET 

DEC 



#%01000111 
PORTA 

#%11110100 
ddra 

#%01111111 
pdra 
QUIETMO 
POWER3 

HI POWER 
POWERO 

PWRLEVL, DDRA 
PWRLEVH, DDRA 

#$07 

irdout , porta 
irdout , ddra 

POWER1 
irdout, ddra 

#$0F 

POWER2 
RBASE, porta 



BSR PROCPB 



PSTIMER 
POWER5 
LED, PORTA 
LED, DDRA 
PSTIMER 
stop 



set IR output for active 

release ir data 

set IR data output so that 

IR is off 

HIGH POWER MODE 

disable pulldowns 0-6 

IN QUIET MODE? 



IN HIGH POWER MODE 
DISABLE HIGH POWER CONTROL 

27 microsec 6*7+5=47 
[5] 

[3] l-CYC=.5747mS. 
[3] 

[5] ir led OFF 

[2] 50 microsec 6*15+2=90 

[3] l-CYC=.559mS. 

[3] 

reset the base time 
PROCESS THE PISHBUTTON 
LED TIMER ACTIVE 



ititttltiitittrtitttriitttrirtitttfttttttittttttttitttttitttttitiiittit 



PROCPB BRCLR PUHBUT, PORTB, PBNOT 

TST QUIETMO 

BEQ PROCPB1 

BSET LED, PORTA 

BSET LED, DDRA 

Ida #$FF 
PROCPBD deca 



/ IS THE PB PUSHED? 

; FLASH LED IF IN QUIET MODE 



; LED ON 

; [2] 256*18=4608 eye 
; [3] 
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incs 








deca 




' f3] 








" [3] 








• [3] 




bne 


PROCPBD 


' [3] 




BCLR 


LED, PORTA 


• LED OFF 


PR0CPB1 


LDA 


PBCTR ; DO NOT GO ABOVE 255 




CMP 


#$FF 








POWOOS 






INC 


PBCTR 


• BUMP THE PB ACTIVE COUNTER 




LDA 


PBCTR ; BETWEEN 4 AND 6 SECONDS 




CMP 


#$4 0 ; LED ON AT 4 SECONDS 




BLO 


POWOOS 






T.HA 


#$50 ; set LED timer 




O In 


P9TTMFR 
roil i"i£j r\ 






9TA 


HT POWFR 


QFT HTHH POWFR MOHF 




CLR 


ohtftmo 


FYTT OnTTTT MOnTT 




R9FT 


Tpn PORTA 


t rn oki 




BSET 


t.fd nnRA 






LDA 


PBCTR 


LED OFF AT 6 SECONDS 




CMP 


#$60 






BLO 


POWOOS 






BCLR 


T FD PORTA 






CLR 


PSTIMER 


NO LED TIME IN LOW POWER 


MODE 












HI POWER 


SET LOW POWER MODE 


POWOOS 




RTS 




rttttrrrrt 


r r r r r r r 


titftttittttittititttttitt 


ffffff/rrffffff/ff/frt/rr/f 


PBNOT 


LDA 


PBCTR 


ENTRY INTO QUIET MODE? 




CMP 


#$40 


>2 SECONDS, EXIT/ENTER 


QUIET MODE 








BLO 


PBNOT 1 






CMP 


#$A0 


>10 SECONDS DOWN? 




BLO 


PBNOT2 






LDA 


#1 


SET QUIET MODE 




STA 


QUIETMO 




PBNOT 1 


CLR 


PBCTR 


CLEAR THE PB DOWN COUNTER 




RTS 






PBNOT2 


CLR 


QUIETMO ; 


EXIT QUIET MODE 




BRA 


PBNOT 1 




rrtttttrtt 


t t t i t t t 


t t t r t r r t r i r r r r t r r i t i r r r i r i 


r r r t t r r t r r t r r r r r t r r r r r r r r t t 


; ; ; reset 


vectors 







org 


$07f8 


fdb 


POWER 


fdb 


POWER 


fdb 


POWER 


fdb 


POWER 


end 
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APPENDIX II 



RECEIVER CODE 
COPYRIGHT © POINT SIX WIRELESS, LLC 2002 



ttfrttttftffffffftttfttttfttttftffffffffffffffffftftffffffffffiffffffff 

base $10 

INCLUDE 'HVOSJlA.asm' ; equates for the HC705J1A 

This is the Standard version seed = $0000 
This version is the COUNTER IR receiver/418 transmitter 
The clock taps the main processor 16/second. 
The xtal is 4 Mhz. 



ID 
SID 

XMPERIOD 
SEEDMSB 

SEEDLSB 



EQU 
EQU 
EQU 
EQU 



$11 
$10 
$0A 
$00 



EQU $00 



COUNTER ACCUMULATOR 
SERVICE ID 

transmitt period = 10 seconds 
MSBYTE SEED FOR POINT SIX 
STANDARD 

LSBYTE SEED FOR POINT SIX 
STANDARD 



org 
fcb 



MOR 
$A0 



; SHORT OSC DELAY 



t t r t ? i ? r i i f r t r i f i r i r r t r t r t t t t t t t t t t r i t i r t i t i t t t i t r r t t r t r t i t r i r i r i r r t t i t 



Equates and RAM Storage 



/ / / t t t r r r r / r r r i t r / / r t t r / r r r r r r t t r r r t t r / r i r r r r r t r r i r t r r i r t t / r t r r r r r r t r t r 



; I/O Pin Equates: 



rff/frfrrrrrrtttffrr/rrrrfffrrfrrfrrrrrrrrrrtrrrrtffrrrrrrfrrrrrrtr/frt 



TPS 

IRPWR 

LCDCLR 

LED 



equ $10 



equ 
equ 
equ 



0 
1 
2 



; 16 ticks/second 

PA0, IRPOWER, output 
PA1, LCD CLR, OUTPUT 
PA2, LED DRIVE ACTIVVE HIGH, 
OUTPUT 
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IRIN 
LCDCTR 
SPARE 5 
radio 
RBASE 



equ 
equ 
equ 
equ 
equ 



3 
4 
5 
6 
7 



PA3, ir data, INPUT 

PA4, LCD CTR, output 

PA5, SPARE, OUTPUT 

PA6, radio transmit data, OUTPUT 

PA7, RESET BASE TIMER, OUTPUT 



PUHBUT 
SPAREB3 



equ 
equ 



2 
3 



PB2, PUSHBUTTON INPUT 
PB3, SPARE, OUTPUT 



OSWITCH 
CSWITCH 



equ 
equ 



open-door status bit in STATUS 
close-door status bit in STATUS 



org RAM 



BYCT 

CHAR 

TEMPA 

SECOND 

SUBCTR 

STATUS 

PBCTR 

SETUPMOD 

SETUPTIM 

HOLDOFF 

XPEND 

MISSED 

MULBLOCK 

SERVICE 

QUIETMO 

TOTMSEC 
L VALID 
ALLRSYN 
LOOKTIME 
REPEAT 



RMB 
RMB 
RMB 
RMB 
RMB 
RMB 
RMB 
RMB 
RMB 
RMB 
RMB 
RMB 

RMB 
RMB 
RMB 

RMB 
RMB 
RMB 
RMB 
RMB 



BYTE COUNT 

CHARACTER STORE FOR SERIAL DATA 

TEMP STORAGE 

second sub counter 

SUB COUNTER 

STATUS BITS 0, 1 

PUSH BUTTON DOWN COUNTER 

TEST MODE FLAG 

SETUP TIMER 

TRANSMISSION HOLDOFF 

XMIT PENDING 

MISSED IR RECEPTION ON 

LAST CYCLE FLA 

MULTIPLYER FOR BLOCKED TIMER 
SERVICE 

QUIET MODE FLAG, l=NO 
TRANSMISSIONS 

TOTAL MISSED SECONDS COUNTER 
LAST PULSE WAS A VALID PULSE 
ALLOW-RESYNC-ATTEMPT FLAG 
LOOK FOR PULSE TIMER 
REPEAT ON NEXT SECOND 



r t r r r r f 

TYPEID 

SHORTSN 

CYCOPEN 

TOTMISS 

WWCRC 



THIS IS THE START OF THE TRANSMITT DATA PACKET 



RMB 
RMB 
RMB 
RMB 
RMB 



1 
4 
3 
3 
2 



TYPE ID FIELD 

SHORT SERIAL NUMBER THIRTY BITS 
COUNTER FOR OPEN SWITCH 
COUNTER FOR OUT OF SYNC 
CRC16 



;;;;;;; THIS IS THE END OF THE TRANSMITT DATA PACKET 



WWBYCT 

TTIME 

NODE 

RANDOML 

RETRYX 



RMB 
RMB 
RMB 
RMB 
RMB 



BYTE COUNT 
TRANSMITT CELL TIME 

RANDON COUNTER 

10 SECOND RETRY TRANSMITTER 



org 



EPROM 



start at the top of EPROM 



f r r r t t t r r r i / / t t r t t t t r r r t r i / i t t / / t r r t r r r / r t t i r r t t t / / r r t r r t t t r i t t r / t t t / r t 
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SERIAL 



FCB $30, $10, $20, $00 ; SERIAL NUMBER 



r t r t r r r t r t t t r t r r r r t r r t r r r r r r t r r r t t f r i r r r r r r r r t t r r r r / t r t r r r r r i t r / r r t t t r r 



POWER 



POWER1 



RSP 








bclr 


irqe, iscr 


; disable external int 


Ida 


#%00100001 


; ON 


THE TSOP700 


sta 


PORTA 






Ida 


#%11100101 


; [2] 




sta 


ddra 


• [4] 




Ida 


#%11111111 


; [2] 


DISABLE PULL DOWNS. 


sta 


pdra 


? [4] 




bset 


irqr, iscr 


; [3] 


clear the irq 


Ida 


#$00 


' [2] 


LOW OUTPUTS 


sta 


PORTB 


? [4] 




Ida 


#$08 


' [2] 


PB2 IS AN INPUT 


sta 


ddrb 


; [4] 




Ida 


#$00 


? [2] 


Enable pulldowns ON PORTB 


sta 


pdrb 


' [4] 




TST 


QUIETMO 


' [4] 


TEST FOR QUIET MODE 


BNE 


POWER1 


• [3] 




LDA 


L VALID 


• [3] 




CLR 


LVALID 


1 [4] 


LAST PULSE INVALID BY DEFAULT 


TSTA 




' [3] 




BNE 


PULSE 


• [3] 


YES, PULSE ANOTHER 


TST 


ALLRSYN 


' [4] 


RESYNC ATTEMPT ALLOWED 


BNE 


RESYNC 


' [3] 


53 CYC 


JSR 


MTOTAL 


* TOTAL THE MISS 


BRA 


SLEEP 






DEC 


QUIETMO 


• GET 


THE FLAG/TIMER 


BNE 


SLEEP 


• BUMP IT TOWARD ZERO 


LDA 


#TPS 


• RESET THE TIMER/ FLAG 


STA 


QUIETMO 


FOR 1 SECOND LCD TICK 


BCLR 


LCDCTR, PORTA 


COUNT THE TICK 


BSET 


LCDCTR, DDRA 


ON 


THE LCD 


BRA 


SLEEP 







t t r f t f l * i f r t t r t r t t t i t r i r t t i t , / / / / / r t r r t t r r / t t , , , , , , , / / r r i r t t t r r r f / / / r r r 



RESYNC 


LDA 


#$08 


' [2] 


+ 53-cyc sense ir sense on 


RESYNC1 


DECA 




• [3] 


MUST NOT TEST FOR 50MS, 










100 CYC 




BNE 


RESYNC1 


• [3] 


53+N*6=100, N=8 


RESYNC2 


LDA 


#$FF 


• [2] 






STA 


LOOKTIME 


' [4] 


CLEAR THE OVERALL LOOK TIMER 


RESYNC3 


BRCLR 


IRIN, PORTA, IRVT 


[5] 


HIT OR TIMEOUT! 




DEC 


LOOKTIME 


' [5] 


MOVE THE LOOK TIMER 




BNE 


RESYNC3 


* [3] 


(7.5)^256=1920 CYC, 1 MILLI 




JSR 


NOWOP 


BEAM PATH IS NOW OPEN 




JSR 


MTOTAL 


TOTAL THE MISS 




JSR 


CYCEND 


DO 


THE CYCLE END STUFF 




TST 


SETUPMOD 


RESET THE SETUP TIMER 
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BEQ RESYNC4 ; IF IN SETUP MODE 

LDA #$FF 

STA SETUPMOD 

RESYNC4 BRSET IRIN, PORTA, RESYNC4 ; HIT OR TIMEOUT! 

BRA IRVT 



t r r t / / / r / r r f r / / / r r r / t / f r r / f r r r / r r r r f / / r f t r r / / r f f r r r r r / r / r r r / / r r / r r r r r f f 



PULSE 
PULSE1 



PULSEX 



LDA 
DECA 

BNE 

LDA 



#$09 

PULSE1 
#$07 



BRCLR IRIN, PORTA, IRVT 

INC RANDOML 

DECA 

BNE PULSEX 
BRA INVALID 



[2] 2+ 46-cyc sense ir sense on 
[3] MUST NOT TEST FOR 50MS, 100 
CYC 

[3] 48+N*6=100, N=9 

[3] THEN LOOK FOR LOW WITHIN 50 
MS. 

[5] POSSIBLE HIT OR TIMEOUT! 

[5] RANDOMIZE 

[3] 

[3] 16*N=100, N=7 



IRVT LDA #$0 9 

IRVTL BRSET IRIN, PORTA, IRVALI 

DECA 

BNE IRVTL 

INVALID BRA RESYNC2 



[2] MUST GO HIGH AGAIN WITHIN 50MS 

[5] AFTER GOING LOW 

[3] 

[3] 2+ll*N=100CYC, N=9 
ATTEMPT TO RESYNC . 



IRVALID 


BSET 


RBASE, PORTA 




BCLR 


IRPWR, DDRA 


IRHIT 


TST 


MISSED 




BNE 


IRHIT2 




TST 


SETUPMOD 




BEQ 


IRHIT1 




BSET 


LED, PORTA 




BSET 


LED, DDRA 




DEC 


SETUPMOD 


IRHIT1 


JSR 


NOWCL 


IRHIT2 


CLR 


MISSED 




CLR 


MULBLOCK 




LDA 


#1 




STA 


L VALID 




BRA 


SLEEP 



; RESET TIMEBASE, NOW IS 0 TIME 

; POWER DOWN THE SENSOR 

; THE PATH IS CLOSED ONLY IF 

; THE LAST PULSE WAS ALSO VALID 

; TEST MODE? 

; FLASH THE LED IN TEST MODE 

; COUNT THE FLASH 

; BEAM PATH IS NOW CLOSED 

; CLEAR THE MISS CTR 

; AND THE MULTIPLYER FOR BLOCKED 

; SET PULSE VALID 



r / r / r / r r r r r r r / r r r r r r f r f / r r r r / r r r r r r r r r r t r r r r r t r r f r r r r r f f f f r r r r r t t r r / r f r 



i i f t i r f r f / t t r r r t r r r t r r r t r r t / t r t / r t t t t r r t / / / / r i t t r r r t r t t r t r r t t t t t r t / t t r / 



SLEEP BSR CYCEND 

BCLR RADIO, PORTA 

BCLR IRPWR, DDRA 

BSET irqr,iscr 
STOP 



DO THE CYCLE END STUFF 
RADIO OFF 
ir sub system off 
clear the irq 



tfttttttftittitittitirtiittrittttttttttitrrrttttttttittttttittrttrtrrrt 
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CYCEND 



CYCENDRL 



CYCEND1 



CYCEND2 



CYCEND3 



CYCENDXM 



CYCENDNX 



CYCENDS 



LDA 


SECOND 


/ 


SUB SECOND COUNTER 


BEQ 


CYCENDRL 


r 


EXPIRED SECOND, RELOAD 










qtz\ 

o In 


O Hi \j ln u 






1 O 1 


crp\/T pr 
OHjK V 1 L/Hi 


r 


TDftMCMTT CrD\7TPr MPVaT 
iKANoLVlll obKVlUb NUW 


RKIF 

JDLN Hj 


V-/ X ^/ H» LN L/A.L 1 






1 O 1 


QFPDMn 

0£j^kJlN]J 






DKtr 

LJ L\ XL 


^ I Hi In U O 






T QT 
1 O 1 


QTTTHDT TM 
O £j 1 U r 1 1 LY1 


f 


QTTTnD TTMITD DMMMTMPO 

oblUr 1 ILYlbK KUNNlNb: 




U I UHjIN UK-Li 








QTTTHDT TM 
o b 1 U Jr 1 1 IYJ 






OKI TP 


L. i LbNUKlj 








ob 1 UriyiUU 


f 


LAll oblUr LVKJLJb, ilLYlbOUl 


IjUA 


# t no 
ff 1 ro 


r 


obi ilCrvo/obL 


QT ft 


QrpoMn 
oiLL/UiNiJ 






t nzx 


CF1DPTD 

oUnUl K 


f 


oUd liNlibKVAL LUUNlbK 


UHi^A 








2i Kin 

ALN U 


ff y J z 






O ryi 7\ 


Q nRPTP 
O UdU 1 K 






DMT? 

£5 IN 111 


b 1 L> Hi Ln U 1 






t nz\ 
LiUA 


KALN UUFJIj 


t 


DAM nr^M T *7 IT 
KALM UULMl 1 L b 


t nv 


RANDOML 






HivJK 


POWER, X 






awn 
AND 


#$07 






n nn 

ALJ 1J 


#XMPERI0D 




Ann TQDTT T P^ TDAMCMTTT 1 DCDTPn 

ALJU JLoJdI 1 1U IKANoLXilii rbKlUIJ 


Q T Z\ 
bin 


SUBCTR 




KANDULYl U- / oLLUNU oLlP Ob 








1 LN 1 bK V AL 


bin 


XPEND 






T QT 
1 O 1 


SERVICE 


IKANoLYlll obKVJLLb NOW 




CYCENDXM 






T Q T 


REPEAT 


D TP DC 7\ T 1 DAPVPfPO 

KbrbAl rAOKblr 




CYCEND2 






CI D 


REPEAT 


V T T T DCDT? 7\ T 1 TPT AP 

J\lJ_tij KbrbAl r LAb 




CYCENDXM 


iKANoLYlli AUA1N 


T Q T 


HOLDOFF 


UAT Pi^MT I? TTMTTD 

rlU-LLJUr c 1 ILYlbK 


DTP 


CYCEND3 








HOLDOFF 






£5L\IEj 


CYCENDS 






J_i UA 


XPEND 




YMTT DTTMnTMP 1 "? 




CYCENDS 




LNU . 


Q T Z\ 


REPEAT 




QTT TP DTTDTrnT 

obi 1U KbirbAl 


T QT 
lol 


QUIETMO 




HP^ MPT TDQMQMTTT TM PV7TITT MPM^iI? 
UU LNU1 lKALNoL v llil 1LM yUlLI LYlUlJEj 




CYCENDNX 






TQ D 

J oK 


X PACKET 




IKALnoLYIII rAUixrijl 




XPEND 




pT T?AD DUMHTMP TTT AP 


t nn 

LiUA 


#$0A 




nUljJJ Ur c r UK 1U bbLUNUo 


STA 


HOLDOFF 




THE NEXT TRANSMISSION 


TST 


RETRYX 




RETRYS REMAINING? 


BEQ 


CYCENDS 






DEC 


RETRYX 






LDA 


#$0A 


SET 10 SECOND RETRY XMIT TIMER 


STA 


SUBCTR 






JSR 


PROCPB 


PROCESS THE PUSH BUTTON 
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CYCENDSS RTS 



r r r r r r $ r r 


r r r r r r r r 


rrrrrrrrrrrrrrrr 


r r r r 


rrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrr 


NOWCL 


BCLR 


OSWITCH, STATUS 


r 


"CLOSED", CLEAR THE OPEN STATUS 




BRSET 


CSWITCH, STATUS, NOWOPE ; IS IT NEW? 




BSET 


CSWITCH, STATUS 


r 


"NEW" SET THE CLOSED STATUS 




BRA 


XPRETRY 


r 


CAUSE A TRANSMISSION 


t r r r t f r r i 


r r r r r f r t 


rrrrrrrrrrrrrrrr 


r r r r 


rrrrrrrrrrrrrrrrrrrrrrrrrrrrrrirrr 


NOWOP 


BCLR 


CSWITCH, STATUS 


r 


"OPEN", CLEAR THE CLOSED STATUS 




BRSET 


OSWITCH, STATUS, NOWOPE 




BSET 


O^WTTPH CJTATH^ 


r 


NPW 9PT THP "OPPN" ^TATTI^l 




BCLR 


T rnfTR PORTA 


r 


POriMT THP HTT 




BSET 




r 






INC 


PYPOPPN 


r 


POriMT THP APTTVP QTATF 




BNE 


Y PQPTT PP> 
At OH 1 J_)Hj JJ 


r 


TRANTQMTT PlATA 




INC 


PYPOPPNI4- 1 
I^U r HLN T X 








BNE 


A.l:Dni±jHU 


r 


TRAM^MTT HATA 




INC 


pypoppni4- 9 






XPSETLED 


BSET 


T PPl PORTA 


r 


i?t ncu thp T Pn 




BSET 


t pn nnp z\ 


r 




XPRETRY 


LDA 




r 


<^PKin THRPP MORP AT 1 D ^PP PPRTOn 




STA 


RPTR YY 
r\H 1 I\ I A 








LDA 




r 


QPT THP YMTT PPKIHTMP PT AP 




STA 


YPPKin 

A n H IN U 


r 


TO PMART P TRAM^MTT DATA 


NOWOPE 


RTS 








rrrrrrrrr 


rrrrrrrr 


rrrrrrrrrrrrrrrr 


r r r r 


trrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrr 


MTOTAL 


INC 


TOTM9PP 


r 


^FTR ^PPOMD POF1NTPR 




LDA 


TOTM^PP 








CMP 




r 


ttpkc; ppr ^PnoKin 




BLO 


MTOTAT 1 








CLR 


TOTMQPP 








INC 


TOTMISS 




BUMP TOTALS, 8 HRS=007080h 




BNE 


MT0TAL1 








INC 


TOTMISS+1 




256 SEC/COUNT 




BNE 


MTOTAL 1 








INC 


TOTMISS+2 




65536 SECONDS/COUNT, 1=18.2 HRS 


MTOTAL1 


INC 


MISSED 




NOT MAXED, BUMP IT. 




LDA 


MISSED 




GET THE MISSED COUNTER 




CMP 


#$E8 




ACT NORMAL FOR 232-CYC BLOCKED 




BLO 


MTOTALM 




INDICATE WINDOW HERE 




CMP 


#$FF 




(255-232) CYC, REPEAT OPEN WINDOW 




BLO 


MTOTALB 




BLOCK RESYNC ATTEMPT UNTIL WINDOW 




LDA 


#$E8 




YES, SET BACK TO 15 SEC POINT 




STA 


MISSED 




TEST FOR RESYNC EVERY 1.5*4 SEC 




INC 


MULBLOCK 




INCREMENT THE MULTI PLYER 




LDA 


MULBLOCK 








CMP 


#$04 








BLO 


MTOTALB 


r 


BLOCK RESYNC ATTEMPT ON NEXT CYC 




CLR 


MULBLOCK 






MTOTALM 


LDA 


#1 


r 


ALLOW RESYNC ATTEMPT ON NEXT CYC 
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MTOTALB 



STA ALLRSYN 
RTS 

CLR ALLRSYN 
RTS 



; BLOCK RESYNC ON NEXT CYCLE 



/ t t t t t t t t 


tftttfttt 


tttrtfttttttftttttttttttttfffftttttttftftfftfftfttrtt 


r\ i~\ /-\ S~** T\ T"\ 

PROCPB 


BRCLR 


PUHBUT, PORTB, PBNOT; IS THE PB PUSHED? 




LDA 


PBCTR 


• DO NOT GO ABOVE 255 




CMP 


#$FF 






BEQ 


POWOOS 






INC 


PBCTR 


• BUMP THE PB ACTIVE COUNTER 




LDA 


PBCTR 


• IF >4 SECONDS, CLEAR LCD CTR 




CMP 


#$40 






BEQ 


PROCPB1 


• SET CLEAR LCD/COUNT MODE 


POWOOS 


RTS 






PROCPB1 


BCLR 


LCDCLR, PORTA 


• SET THE LCD CLEAR LOW 




BSET 


LCDCLR, DDRA 






CLR 


CYCOPEN 






CLR 


CYCOPEN+1 






CLR 


CYCOPEN+2 






CLR 


TOTMSEC 






CLR 


TOTMISS 


• CLEAR THE TOTAL MISSED COUNTER 




CLR 


TOTMISS+1 






CLR 


TOTMISS+2 






CLR 


SETUPMOD 


• CLEAR THE SETUP MODE 




CLR 


SETUPTIM 






CLR 


QUIETMO 


* EXIT QUIET MODE 




RTS 






PBNOT 


LDA 


PBCTR 


• SET TEST MODE ON PB UP 




CMP 


#1 


• COUNT MUST BE ABOVE 1 




BLS 


PBNOTC 






CLR 


SETUPMOD 


• CLEAR THE SETUP MODE 




CLR 


SETUPTIM 






CMP 


#$28 


• IF LCD CLEAR DO NOT ENTER TEST 




BHS 


PBNOTCQ 


• OR IF SERVICE MODE 




LDA 


#1 


• SET SERVICE MODE 




STA 


SERVICE 






LDA 


#$80 


• SET TEST MODE TIMER/STATUS 




STA 


SETUPMOD 


• HITS REQUIRED TO EXIT SETUP MODE 




LDA 


#$3C 


• 120 SECOND MAX TIME FOR SETUP 




STA 


SETUPTIM 






CLR 


MISSED 


• CLEAR THE MISS CTR 




CLR 


MULBLOCK 


• AND THE MULTIPLYER FOR BLOCKED 


PBNOTC 


CLR 


PBCTR 


• CLEAR THE PB DOWN COUNTER 




RTS 






PBNOTCQ 


CMP 


#$80 ; 8 SECONDS PUSHED? 




BLO 


PBNOTC 






LDA 


#TPS ; SETUP FOR 1/SEC COUNT 




STA 


QUIETMO / SET QUIET MODE 


i i t t i r t t / 


BRA 
tttttfttt 


PBNOTC 

tttttttttttttttttt 


ttitittttiitiiritifttitrttfiiittti 
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t nzv 
LDA 


bEKlAL 




/-> T-> rp rpTlI? CPDTAT M TIN/I'D I? T~> 

bEl Inh bEKXAL NUMbbK 






briOKl bN 








t r\7\ 


CTD T 7\ T i ~\ 








b 1 A 


briUKl bN + 1 








LDA 


bEKlAL+z 








O T 7\ 

b 1 A 


onUKl bN + Z 








T n?\ 

LDA 


SERIAL+ 5 








AND 


il o t?A 








STA 


SHORTSN+3 








LDA 


MISSED 


/ 


GET THE MISSED COUNTER 




OMr 




r 


BLOCKED r 




DUO 










t r\i\ 
LDA 


C rp TV T> T7C 

b 1 Al Ub 


r 


bEl 1HE blAlUb INrUlb 




AND 


# c n 


r 


MAbK lhE blAlUb 




An 7\ 

OKA 


briOKl bN + o 








O rp 7\ 

bTA 


C MAD (TlPM i O 

bHORTSN+o 






XPACKBK 


LDA 


#ID 




SET THE TYPE FIELD 




STA 


TYPEID 








TST 


SERVICE 




SERVICE MODE? 




BE(J 


T~> TVT 7\ T TTP O 

R WAVES 








LDA 


#SID 




GET SERVICE ID 




STA 










CLR 


SERVICE 






T~) r«7 7\ T TTT 1 C 

R WAVES 


BSR 


TVT T~> A A 7\ T 

WRCCAL 


f 


CALCULATE CRC 16 OF DATA 


DTYTTV \ TTP 


LUA 


ff9 UD 


r 


bEND BLKblZE+z BYlEb 




STA 


WWBYCT 








LUX 


11 m w -pi TJ7 1 T I~>i 


r 


point to ID, data 


RWAVEX 


BSET 


radio, PORTA 


f 


RADIO ON FOR lUUO MICROSEC 




LDA 




f 


TO-A-X7 OAAA AX/ATT^C "K7 T/~'7 

lz*N=zOUU CYCLES, N=167 


O TV7 7\ T 7 TP T 

KWAVE1 


DECA 




r 


[3] 




INCA 




r 


[3] 




DECA 




r 


[3] 




BNE 


RWAVEI 


/ 


[3] 


RWAVE1 


BSR 


Putchar 


f 


[6] 




INCX 




I 


[3] 




DEC 


WWBYCT 


f 


[3] BYTE COUNT IMAGE 




BINE 


DT/i7 7\ T 7TT 1 1 


f 


r O 1 1 CT AVAT TO AU 1 AT 7T7 1 73 TJ TP 7\ 








f 


T\7rpT3 7\ p) \/rn -0 

INTRABYTE 




BCLR 


RADIO, PORTA 


t 


n 7\ HT A APP 

RADIO OFF 




RTS 




f 




t t r / r r r r r 


t / t r i r r i 


fffffffffffffff/t 


t t f 


ttrrrtrrrrttrrtrrrtrrttrttri 


WRCCAL 


LDA 


AL pT?P HT (~i T~) 

#SEEDLSB 


/ 


APT 1 n T CO 

SEED LSB 




STA 


WWCRC+1 


f 


SEED THE CRC 




LDA 


#SEEDMSB 


f 


SEED MSB 




STA 


WWCRC 








LDA 


#$0B 


f 


BYTES TO CRC 




STA 


WWBYCT 








LDX 


#TYPEID 


/ 


POINT TO DATA RECORD 


WRCCALO 


LDA 


,x 








INCX 
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WRCBYT 



WRCCAL1 



WRCCAL2 



EOR 
STA 
LDA 
STA 
LSR 
ROR 
BCC 
LDA 
EOR 
STA 
LDA 
EOR 
STA 
DEC 
BNE 

DEC 

BNE 

LDA 

COMA 

STA 

LDA 

COMA 

STA 

LDA 

STA 

RTS 



WWCRC+1 
WWCRC+1 
#8 

Node 

WWCRC 

WWCRC+1 

WRCCAL2 

WWCRC 

#$A0 

WWCRC 

WWCRC+1 

#$01 

WWCRC+1 

Node 

WRCCAL1 

WWBYCT 

WRCCALO 

WWCRC 

WWBYCT 
WWCRC+1 

WWCRC 

WWBYCT 

WWCRC+1 



EOR DATA WITH CRC LSB 

SET 8 BIT COUNTER 

SHIFT IT RIGHT ONE PLACE 



; REVERSE LSB/MSB 



f r r r f r r r ( f f r f f r r f f r f f r f i f f r r f r r r r r r t r r r / / r r r r f r r r r r / r r r r f r / r r r f / f , f r f r 

;; reset vectors: 

org Timer_INT 
fdb Timer SVR 



org 
fdb 

org 
fdb 

org 
fdb 



IRQ_INT 
IRQ_SVR 

SWI__INT 
SWI_SVR 

RESET 
Start 
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org 
fdb 
fdb 
fdb 
fdb 

end 



$07f8 
POWER 
POWER 
POWER 
POWER 



